home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / C-Cl / Chem Inventory.cpt / Chem Inventory / Chem Inventory 2.0b1 / stack_-1.xml < prev   
Extensible Markup Language  |  1991-07-26  |  3KB  |  35 lines
  1. <?xml version="1.0" encoding="utf-8" ?>
  2. <!DOCTYPE stack PUBLIC "-//Apple, Inc.//DTD stack V 2.0//EN" "" >
  3. <stack>
  4.     <name>in.0b1</name>
  5.     <id>-1</id>
  6.     <cardCount>15</cardCount>
  7.     <cardID>39297</cardID>
  8.     <listID>7929</listID>
  9.     <cantModify><false /></cantModify>
  10.     <cantDelete><false /></cantDelete>
  11.     <cantAbort><false /></cantAbort>
  12.     <cardSize>
  13.         <width>512</width>
  14.         <height>342</height>
  15.     </cardSize>
  16.     <script>on OpenStackset numberFormat to "0.#"global holdlevelget userlevelput It into holdlevelset userlevel to 3get the freesize of this stackif it <> 0 then domenu "Compact Stack"get the size of this stackput it into Big1divide Big1 by 1024put Big1 into field 2 of card id 39297get field 6 of card id 39297if it is empty then ask "Please type in your full name:"put it into field 6 of card id 39297get field 6 of card id 39297if it is empty then domenu "Quit Hypercard"create menu "Utilities"delete menu "Font"delete menu "Style"delete menu "Tools"--set menuItem | of menu "Apple" to "About this stack..."end OpenStackon AnimCurs CursType, MaxCountglobal AnimCursNumberadd 1 to AnimCursNumberset the cursor to CursType & AnimCursNumberif AnimCursNumber > MaxCount then put 1 into AnimCursNumberend AnimCurson advanceCursorglobal cursCountwait 1 tickset cursor to "Earth" & cursCountif cursCount > 6then put 1 into cursCountelse add 1 to cursCountend advanceCursoron CloseStackglobal holdlevelset userlevel to 5reset menubarend CloseStack</script>
  17.     <background id="4909" file="background_4909.xml" name="" />
  18.     <background id="38941" file="background_38941.xml" name="" />
  19.     <card id="39297" file="card_39297.xml" marked="false" name="Summary" owner="38941" />
  20.     <card id="2897" file="card_2897.xml" marked="false" name="" owner="4909" />
  21.     <card id="4732" file="card_4732.xml" marked="false" name="" owner="4909" />
  22.     <card id="2585" file="card_2585.xml" marked="false" name="" owner="4909" />
  23.     <card id="6055" file="card_6055.xml" marked="false" name="" owner="4909" />
  24.     <card id="3091" file="card_3091.xml" marked="false" name="" owner="4909" />
  25.     <card id="5859" file="card_5859.xml" marked="false" name="" owner="4909" />
  26.     <card id="3955" file="card_3955.xml" marked="false" name="" owner="4909" />
  27.     <card id="5553" file="card_5553.xml" marked="false" name="" owner="4909" />
  28.     <card id="4112" file="card_4112.xml" marked="false" name="" owner="4909" />
  29.     <card id="10606" file="card_10606.xml" marked="false" name="Base card" owner="4909" />
  30.     <card id="3615" file="card_3615.xml" marked="false" name="" owner="4909" />
  31.     <card id="4509" file="card_4509.xml" marked="false" name="" owner="4909" />
  32.     <card id="7124" file="card_7124.xml" marked="false" name="" owner="4909" />
  33.     <card id="2520" file="card_2520.xml" marked="false" name="" owner="4909" />
  34. </stack>
  35.